home *** CD-ROM | disk | FTP | other *** search
/ Sports Illustrated for Kids - Awesome Athletes! / Sports Illustrated for Kids - Awesome Athletes!.iso / tr.dir / 00010_InitPlayerObjects.ls < prev    next >
Encoding:
Text File  |  1996-04-18  |  623 b   |  18 lines
  1. on InitPlayerObjects
  2.   global gzTRPlayerObj
  3.   addAt(gzTRPlayerObj, 1, birth(script "PlayerParentObject"))
  4.   addAt(gzTRPlayerObj, 2, birth(script "PlayerParentObject"))
  5.   mSetMyCurrentScore(getAt(gzTRPlayerObj, 1), 0)
  6.   mSetMyCurrentScore(getAt(gzTRPlayerObj, 2), 0)
  7.   mSetMyHighestScore(getAt(gzTRPlayerObj, 1), 0)
  8.   mSetMyHighestScore(getAt(gzTRPlayerObj, 2), 0)
  9.   mSetMyName(getAt(gzTRPlayerObj, 1), "Johnny B.Good")
  10.   mSetMyName(getAt(gzTRPlayerObj, 2), "Daddy Duane")
  11. end
  12.  
  13. on ResetPlayerScores
  14.   global gzTRPlayerObj
  15.   mSetMyCurrentScore(getAt(gzTRPlayerObj, 1), 0)
  16.   mSetMyCurrentScore(getAt(gzTRPlayerObj, 2), 0)
  17. end
  18.